Designer's Club 1998 May/Designer's Club 1998 May.iso/pc/IDEASRC/LIGHT.DIR/00003_flashlight thing.ls

Text File | 1998-04-06 | 631 b | 29 lines

on exitFrame
  go(the frame)
  cursor(200)
  set the locH of sprite 2 to the mouseH
  set the locV of sprite 2 to the mouseV
  if the mouseDown then
    cursor(-1)
    go(the frame + 1)
  end if
  repeat with n = 32 to 35
    if rollOver(n) then
      set the visible of sprite n to 0
    end if
    if rollOver(n) then
      set the visible of sprite (n + 5) to 1
    end if
    updateStage()
  end repeat
  repeat with n = 32 to 35
    if not rollOver(n) then
      set the visible of sprite n to 1
    end if
    if not rollOver(n) then
      set the visible of sprite (n + 5) to 0
    end if
    updateStage()
  end repeat
end